home *** CD-ROM | disk | FTP | other *** search
/ Power Programmierung / Power-Programmierung (Tewi)(1994).iso / magazine / dbms_mag / 9103 / castonof.asm next >
Assembly Source File  |  1991-01-15  |  1KB  |  42 lines
  1.  
  2. COMMENT $-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  3.         CASTONOF.ASM                    10/03/90
  4.         by P. L. Olympia
  5.  
  6.         Program to enable or disable receipt of broadcast messages
  7.         to a Novell workstation. This utility replaces Novell's
  8.         CASTON and CASTOFF commands, and can be used from within
  9.         any Dbase-compatible program
  10.  
  11.         Usage (for LOAD/CALL):
  12.           LOAD castOnOf
  13.           CALL castOnOf WITH "F"   && (or 'f', equiv to CASTOFF
  14.           (any other parameter, or no parameter means CASTON)
  15.         -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=$
  16.  
  17. CODESEG SEGMENT PARA 'CODE'
  18.         ASSUME CS:CODESEG
  19.  
  20. CASTONOF     PROC  FAR
  21. Doit:
  22.              JMP   begin
  23.  
  24. TootIt       DB  'CastOnOf (c) 1990 by P. L. Olympia',13,10,26
  25.  
  26. Begin:       MOV   AH,0DEH      ;DEh is Set Broadcast Mode function
  27.              CMP  BYTE PTR DS:[BX],'F'    ;check for parm of "F"
  28.              JE    CastOff                ;turn it off
  29.              CMP  BYTE PTR DS:[BX],'f'    ;check for parm of "f"
  30.              JE    CastOff                ;turn it off
  31.  
  32. CastOn:      MOV   DL,0
  33.              JMP   CallDos
  34.  
  35. CastOff:     MOV   DL,2
  36.  
  37. CallDos:     INT   21H
  38.              RET
  39. CASTONOF     ENDP
  40. CODESEG      ENDS
  41.              END   CASTONOF
  42.